#ifdef IS_ENHANCED
  #if (Ver < 0x5020300) || (Pos('ee', IS_Ver_Str) < 1)
    #pragma error 'Enhanced edition of Inno Setup (5.2.3.ee1 or higher) is required to compile this script'
  #endif
#else
  #error Enhanced edition of Inno Setup (restools) is required to compile this script
#endif

[Setup]
AppName=ISSkinViewer
AppVersion=1.0
SetupIconFile=.\Styles\IViewer.ico
DefaultDirName={pf}\ISSkinViewer
OutputBaseFilename=ISSkinViewer
OutputDir=.

[ISFormDesigner]
WizardForm=FF0A005457495A415244464F524D0030106B21000054504630F10B5457697A617264466F726D0A57697A617264466F726D0743617074696F6E06144953536B696E2056696577657220566572312E310C436C69656E744865696768740366010B436C69656E74576964746803EF010853686F7748696E74090C4578706C696369744C65667402000B4578706C69636974546F7002000D4578706C69636974576964746803F7010E4578706C696369744865696768740381010D506978656C73506572496E636802600A54657874486569676874020D00F10654426576656C05426576656C0756697369626C65080000F10A544E6577427574746F6E0C43616E63656C427574746F6E03546F70033501085461624F7264657202050B4578706C69636974546F700335010000F10A544E6577427574746F6E0A4E657874427574746F6E085461624F7264657202040000F10A544E6577427574746F6E0A4261636B427574746F6E085461624F7264657202030000F10C544E65774E6F7465626F6F6B0D4F757465724E6F7465626F6F6B085461624F7264657202010756697369626C650800F110544E65774E6F7465626F6F6B506167650B57656C636F6D65506167650D4578706C69636974576964746803F1010E4578706C696369744865696768740339010000F110544E65774E6F7465626F6F6B5061676509496E6E6572506167650D4578706C69636974576964746803F1010E4578706C69636974486569676874033901000000F10E544E6577537461746963546578740C426576656C65644C6162656C085461624F7264657202020000065450616E656C0650616E656C31044C656674020003546F70020005576964746803F101064865696768740334010A426576656C4F75746572070662764E6F6E650743617074696F6E06012010506172656E744261636B67726F756E6408085461624F7264657202000006544C6162656C064C6162656C31044C656674021003546F700205055769647468022806486569676874020D0743617074696F6E060A536B696E2066696C653A0B5472616E73706172656E7408000006544C6162656C064C6162656C32044C65667403200103546F700205055769647468024306486569676874020D0743617074696F6E060E494E4920706172616D657465723A0B5472616E73706172656E740800000C544E6577436F6D626F426F780F4953536B696E46696C65436F6D626F044C656674021003546F70021505576964746803D500064865696768740215055374796C65070E637344726F70446F776E4C6973740D44726F70446F776E436F756E7402100A4974656D486569676874020D085461624F72646572020000000C544E6577436F6D626F426F780E4953536B696E496E69436F6D626F044C65667403200103546F70021505576964746803C100064865696768740215055374796C65070E637344726F70446F776E4C6973740A4974656D486569676874020D085461624F72646572020100000A544E6577427574746F6E0A42726F7773657242746E044C65667403E80003546F70021305576964746802330648656967687402190743617074696F6E0607536B696E446972085461624F72646572020200000C5450616765436F6E74726F6C0C50616765436F6E74726F6C31044C656674020803546F70022F05576964746803E101064865696768740301010A416374697665506167650709546162536865657431085461624F7264657202030009545461625368656574095461625368656574310743617074696F6E06085374616E646172640C4578706C696369744C65667402000B4578706C69636974546F7002000D4578706C69636974576964746802000E4578706C6963697448656967687402000006544C6162656C064C6162656C35044C656674021803546F700208055769647468021B06486569676874020D0743617074696F6E0605426576656C0B5472616E73706172656E740900000654426576656C06426576656C32044C656674020703546F70020405576964746802420648656967687402150448696E74060654426576656C00000C544269746D6170496D6167650C4269746D6170496D61676531044C65667403950103546F700201055769647468023906486569676874022D0448696E74060C544269746D6170496D616765084175746F53697A6509000006544C6162656C064C6162656C34044C656674025003546F700208055769647468021A06486569676874020D0448696E740606544C6162656C0743617074696F6E06054C6162656C0B5472616E73706172656E7409000006544C6162656C064C6162656C36044C65667403D00003546F70020A055769647468025206486569676874020D0448696E740606544C6162656C0743617074696F6E060F4E657750726F67726573734261723A0B5472616E73706172656E7409000006544C6162656C064C6162656C37044C65667403DF0003546F700222055769647468024306486569676874020D0448696E740606544C6162656C0743617074696F6E060D50617373776F7264456469743A0B5472616E73706172656E7409000008544E657745646974084E65774564697431044C656674020703546F70023805576964746802690648656967687402150448696E740608544E657745646974085461624F726465720200045465787406074E657745646974000008544E65774D656D6F084E65774D656D6F31044C656674020703546F70025405576964746802690648656967687402590448696E740608544E65774D656D6F0D4C696E65732E537472696E67730106084E65774D656D6F3106064C696E65203206064C696E65203306064C696E65203406064C696E65203506064C696E65203606064C696E65203706064C696E65203806064C696E65203906074C696E6520313006074C696E6520313106074C696E6520313206074C696E652031330600000A5363726F6C6C4261727307067373426F7468085461624F72646572020100000C544E6577436865636B426F780C4E6577436865636B426F7831044C656674020703546F7003B40005576964746802550648656967687402110448696E74060C544E6577436865636B426F780743617074696F6E060B4E6577436865636B426F78085461624F72646572020200000F544E6577526164696F427574746F6E0F4E6577526164696F427574746F6E31044C656674020703546F7003CC0005576964746802690648656967687402110448696E74060F544E6577526164696F427574746F6E0743617074696F6E060E4E6577526164696F427574746F6E085461624F72646572020300000B544E65774C697374426F780B4E65774C697374426F7831044C656674027803546F70024C0557696474680255064865696768740391000448696E74060B544E65774C697374426F780A4974656D486569676874020D0D4974656D732E537472696E677301060A4E65774C697374426F7806064C696E65203206064C696E65203306064C696E65203406064C696E65203506064C696E65203606064C696E65203706064C696E65203806064C696E65203906074C696E6520313006074C696E6520313106074C696E6520313206074C696E6520313300085461624F726465720204094974656D496E64657802FF0000065450616E656C0650616E656C32044C656674027803546F70022005576964746802550648656967687402210448696E7406065450616E656C0743617074696F6E060550616E656C085461624F72646572020500000D5450617373776F7264456469740D50617373776F72644564697431044C65667403280103546F70021E05576964746802690648656967687402150448696E74060D5450617373776F726445646974085461624F7264657202060454657874060D50617373776F72644564697431000010544E6577436865636B4C697374426F78104E6577436865636B4C697374426F7831044C65667403D00003546F70023B0557696474680391000648656967687402510448696E740610544E6577436865636B4C697374426F78085461624F72646572020700000E544E6577537461746963546578740E4E65775374617469635465787431044C656674027803546F700208055769647468024706486569676874020E0448696E74060E544E6577537461746963546578740743617074696F6E060D4E657753746174696354657874085461624F72646572020800000F54466F6C64657254726565566965770F466F6C646572547265655669657731044C65667403D00003546F7003900005576964746803910006486569676874025106437572736F72070763724172726F770448696E74060F54466F6C6465725472656556696577085461624F72646572020900000F5452696368456469745669657765720F526963684564697456696577657231044C65667403680103546F70023B05576964746802690648656967687402510448696E74060F545269636845646974566965776572085461624F72646572020A00000F544E657750726F67726573734261720F4E657750726F677265737342617231044C65667403280103546F70020805576964746802690648656967687402110448696E74060F544E657750726F6772657373426172034D696E0200034D6178026408506F736974696F6E024600000C544E6577436F6D626F426F780C4E6577436F6D626F426F7831044C656674020703546F70022005576964746802690648656967687402150448696E74060C544E6577436F6D626F426F780A4974656D486569676874020D085461624F72646572020C0454657874060B4E6577436F6D626F626F780D4974656D732E537472696E677301060B4E6577436F6D626F626F7806064C696E65203206064C696E65203306064C696E65203406064C696E65203506064C696E65203606064C696E65203706064C696E65203806064C696E65203906074C696E6520313006074C696E6520313106074C696E6520313206074C696E6520313300094974656D496E64657802000000185453746172744D656E75466F6C64657254726565566965771853746172744D656E75466F6C646572547265655669657731044C65667403680103546F70039000055769647468026906486569676874025106437572736F72070763724172726F770448696E7406185453746172744D656E75466F6C6465725472656556696577085461624F72646572020D00000009545461625368656574095461625368656574320743617074696F6E060A457874656E64656420310C4578706C696369744C65667402000B4578706C69636974546F7002000D4578706C69636974576964746802000E4578706C6963697448656967687402000006544C6162656C064C6162656C33044C656674020403546F70021B055769647468022606486569676874020D0448696E740606544C6162656C0743617074696F6E0607486F744B65793A0B5472616E73706172656E7409000006544C6162656C064C6162656C38044C65667403CD0003546F7003D100055769647468022D06486569676874020D0448696E740606544C6162656C0743617074696F6E06075570446F776E3A0B5472616E73706172656E7409000006544C6162656C064C6162656C39044C656674026C03546F70021B055769647468024506486569676874020D0448696E740606544C6162656C0743617074696F6E060E495041646472657373456469743A0B5472616E73706172656E7409000006544C6162656C074C6162656C3131044C65667403980103546F700235055769647468022A06486569676874020D0448696E740606544C6162656C0743617074696F6E06085061696E74426F780B5472616E73706172656E7409000009545061696E74426F78095061696E74426F7831044C656674038C0103546F70021805576964746802410648656967687402470448696E740609545061696E74426F78000006544C6162656C074C6162656C3132044C656674020603546F7003D100055769647468022D06486569676874020D0448696E740606544C6162656C0743617074696F6E060A5363726F6C6C4261723A0B5472616E73706172656E7409000006544C6162656C074C6162656C3133044C65667403140103546F7003D000055769647468026506486569676874020D0448696E740606544C6162656C0743617074696F6E06124E65774461746554696D655069636B65723A0B5472616E73706172656E740900000C544E657747726F7570426F780C4E657747726F7570426F7831044C65667403190103546F70026705576964746803B9000648656967687402600448696E74060C544E657747726F7570426F780743617074696F6E060B4E657747726F7570426F78085461624F7264657202000006544C6162656C074C6162656C3134044C656674021C03546F70021B055769647468022F06486569676874020D0448696E740606544C6162656C0743617074696F6E0609547261636B4261723A0B5472616E73706172656E740900000954547261636B42617209547261636B42617231044C656674021303546F70022F0557696474680396000648656967687402250448696E74060954547261636B426172085461624F7264657202000000000754486F744B657907486F744B657931044C656674022C03546F70021805576964746802390648656967687402130448696E74060754486F744B65790B506172656E74436F6C6F720806486F744B65790441800000085461624F726465720201000007545570446F776E075570446F776E31044C65667403FB0003546F7003CD000557696474680211064865696768740216085461624F72646572020200000E54495041646472657373456469740E4950416464726573734564697431044C65667403B40003546F70021805576964746802660648656967687402150448696E74060E54495041646472657373456469740B4669656C643156616C756503C0000B4669656C643256616C756503A8000B4669656C643456616C756503980007495056616C7565049800A8C009496E6974436C65617208085461624F72646572020300000E54486561646572436F6E74726F6C0E486561646572436F6E74726F6C31044C656674020003546F70020005576964746803D9010648656967687402110448696E74060E54486561646572436F6E74726F6C0853656374696F6E730E010A496D616765496E64657802FF0454657874060E48656164657253656374696F6E31055769647468026400010A496D616765496E64657802FF0454657874060E48656164657253656374696F6E32055769647468026400010A496D616765496E64657802FF0454657874060E48656164657253656374696F6E330557696474680264000000000A545363726F6C6C426F780A5363726F6C6C426F7831044C65667403240103546F70021805576964746802610648656967687402470448696E74060A545363726F6C6C426F78085461624F7264657202050006544C6162656C074C6162656C3130044C656674021C03546F70021B055769647468022C06486569676874020D0448696E74060A545363726F6C6C426F780743617074696F6E06095363726F6C6C426F780B5472616E73706172656E74090000000A545363726F6C6C4261720A5363726F6C6C42617231044C656674023B03546F7003CF000557696474680389000648656967687402110448696E74060A545363726F6C6C426172085061676553697A650200085461624F726465720206000012544E65774461746554696D655069636B6572124E65774461746554696D655069636B657231044C656674037C0103546F7003CC00055769647468025A0648656967687402150448696E740612544E65774461746554696D655069636B6572044461746505004856696ED3A39D0E400454696D6505004856696ED3A39D0E40085461624F726465720207000011544E65774D6F6E746843616C656E646172114E65774D6F6E746843616C656E64617231044C656674020403546F700231055769647468030B01064865696768740399000448696E740611544E65774D6F6E746843616C656E646172084175746F53697A6509044461746505000000000000A39D0E40085461624F72646572020800000009545461625368656574095461625368656574330743617074696F6E060A457874656E64656420320C4578706C696369744C65667402000B4578706C69636974546F7002000D4578706C69636974576964746802000E4578706C696369744865696768740200000D544E657749636F6E496D6167650D4E657749636F6E496D61676531044C65667403780103546F70023605576964746802480648656967687402480448696E74060D544E657749636F6E496D616765084175746F53697A6509094261636B436F6C6F720706636C4E6F6E65000006544C6162656C074C6162656C3136044C65667403780103546F700225055769647468024B06486569676874020D0448696E740606544C6162656C0743617074696F6E060D4E657749636F6E496D6167653A0B5472616E73706172656E740900000B54546162436F6E74726F6C0B546162436F6E74726F6C31044C656674021403546F70020605576964746803B101064865696768740217085461624F7264657202000C546162732E537472696E6773010605546162203106055461622032060554616220330605546162203406055461622035060554616220360008546162496E646578020000000954547265655669657709547265655669657731044C656674020403546F70022605576964746803B1000648656967687403B10006496E64656E740213085461624F7264657202010E4974656D732E4E6F6465446174610A4E0300000108000000330000000000000000000000FFFFFFFFFFFFFFFF00000000000000000D540072006500650056006900650077004900740065006D003100330000000000000000000000FFFFFFFFFFFFFFFF00000000020000000D540072006500650056006900650077004900740065006D003200350000000000000000000000FFFFFFFFFFFFFFFF00000000000000000E5400720065006500560069006500770053004900740065006D003100350000000000000000000000FFFFFFFFFFFFFFFF00000000000000000E5400720065006500560069006500770053004900740065006D003200330000000000000000000000FFFFFFFFFFFFFFFF00000000000000000D540072006500650056006900650077004900740065006D003300330000000000000000000000FFFFFFFFFFFFFFFF00000000010000000D540072006500650056006900650077004900740065006D003400350000000000000000000000FFFFFFFFFFFFFFFF00000000010000000E5400720065006500560069006500770053004900740065006D003100350000000000000000000000FFFFFFFFFFFFFFFF00000000000000000E5400720065006500560069006500770053004900740065006D003200330000000000000000000000FFFFFFFFFFFFFFFF00000000000000000D540072006500650056006900650077004900740065006D003500330000000000000000000000FFFFFFFFFFFFFFFF00000000000000000D540072006500650056006900650077004900740065006D003600330000000000000000000000FFFFFFFFFFFFFFFF00000000000000000D540072006500650056006900650077004900740065006D003700330000000000000000000000FFFFFFFFFFFFFFFF00000000020000000D540072006500650056006900650077004900740065006D003800350000000000000000000000FFFFFFFFFFFFFFFF00000000010000000E5400720065006500560069006500770053004900740065006D003100370000000000000000000000FFFFFFFFFFFFFFFF00000000000000000F54007200650065005600690065007700530053004900740065006D003100350000000000000000000000FFFFFFFFFFFFFFFF00000000000000000E5400720065006500560069006500770053004900740065006D003200000009544C69737456696577094C6973745669657731044C65667403BC0003546F70022605576964746803B1000648656967687403B10007436F6C756D6E730E010743617074696F6E0607436F6C756D6E31055769647468025000010743617074696F6E0607436F6C756D6E32055769647468023C00010743617074696F6E0607436F6C756D6E33055769647468023C00000E4974656D732E4974656D446174610AC802000001CB0200000C00000000000000FFFFFFFFFFFFFFFF02000000000000000D4C0069007300740056006900650077004900740065006D003100085300750062004900740065006D003100085300750062004900740065006D00320000000000FFFFFFFFFFFFFFFF02000000000000000D4C0069007300740056006900650077004900740065006D003200085300750062004900740065006D003100085300750062004900740065006D00320000000000FFFFFFFFFFFFFFFF02000000000000000D4C0069007300740056006900650077004900740065006D003300085300750062004900740065006D003100085300750062004900740065006D00320000000000FFFFFFFFFFFFFFFF01000000000000000D4C0069007300740056006900650077004900740065006D003400085300750062004900740065006D00310000000000FFFFFFFFFFFFFFFF00000000000000000D4C0069007300740056006900650077004900740065006D00350000000000FFFFFFFFFFFFFFFF00000000000000000D4C0069007300740056006900650077004900740065006D00360000000000FFFFFFFFFFFFFFFF00000000000000000D4C0069007300740056006900650077004900740065006D00370000000000FFFFFFFFFFFFFFFF00000000000000000D4C0069007300740056006900650077004900740065006D00380000000000FFFFFFFFFFFFFFFF00000000000000000D4C0069007300740056006900650077004900740065006D00390000000000FFFFFFFFFFFFFFFF00000000000000000E4C0069007300740056006900650077004900740065006D003100300000000000FFFFFFFFFFFFFFFF00000000000000000E4C0069007300740056006900650077004900740065006D003100310000000000FFFFFFFFFFFFFFFF00000000000000000E4C0069007300740056006900650077004900740065006D0031003200FFFFFFFFFFFFFFFFFFFFFFFFFFFF085461624F72646572020209566965775374796C65070876735265706F72740000065450616E656C0D50706F75704D6E7550616E656C044C65667403780103546F70038E0005576964746802510648656967687402390743617074696F6E0609506F7075704D656E75085461624F72646572020300000000000A544E6577427574746F6E07426C6F6742746E044C656674021403546F70033501055769647468026B0648656967687402170448696E74060D7669736974206D7920626C6F670743617074696F6E060E524553544F4F4C532720424C4F47085461624F72646572020600000A545374617475734261720A53746174757342617231044C656674020003546F7003530105576964746803EF010648656967687402130650616E656C730E010454657874060C53746174757350616E656C31055769647468026400010454657874060C53746174757350616E656C32055769647468026400010454657874060C53746174757350616E656C33055769647468026400000F5468656D654261636B67726F756E6408000000

[Code]
procedure LoadSkin(lpszPath: String; lpszIniFileName: String); external 'LoadSkin@isskinex.dll stdcall';
procedure UnloadSkin(); external 'UnloadSkin@isskinex.dll stdcall';
function ShowWindow(hWnd: Integer; uType: Integer): Integer; external 'ShowWindow@user32.dll stdcall';
function LoadLibrary(lpLibFileName: String): THandle; external 'LoadLibraryA@kernel32.dll stdcall';
function FreeLibrary(hLibModule: THandle): Boolean; external 'FreeLibrary@kernel32.dll stdcall';
function EnumResourceNames(hModule: THandle; lpType: String; lpEnumFunc: Longword; lParam: Longint): BOOL; external 'EnumResourceNamesA@kernel32.dll stdcall';
function SetWindowText(hWnd: Longint; lpString: String): Longint; external
#ifdef UNICODE
'SetWindowTextW@user32.dll';
#else
'SetWindowTextA@user32.dll';
#endif
function GetWindowLong(hWnd, nIndex: Integer): Longint; external
#ifdef UNICODE
'GetWindowLongW@user32.dll';
#else
'GetWindowLongA@user32.dll';
#endif

procedure DeinitializeSetup();
begin
	ShowWindow(StrToInt(ExpandConstant('{wizardhwnd}')), 0);
	UnloadSkin();
end;

var
  SkinFilePath: String;
  ViewerPath: String;
  PupMnu: TPopupMenu;
  Mnu: TMenuItem;

procedure BrowserBtn_OnClick(Sender: TObject); forward;

procedure ISSkinFileCombo_OnChange(Sender: TObject); forward;

procedure ISSkinIniCombo_OnChange(Sender: TObject); forward;

procedure BlogBtn_OnClick(Sender: TObject); forward;

{ RedesignWizardFormBegin } // Don't remove this line!
// Don't modify this section. It is generated automatically.
var
  Panel1: TPanel;
  Label1: TLabel;
  Label2: TLabel;
  ISSkinFileCombo: TNewComboBox;
  ISSkinIniCombo: TNewComboBox;
  BrowserBtn: TNewButton;
  PageControl1: TPageControl;
  TabSheet1: TTabSheet;
  Label5: TLabel;
  Bevel2: TBevel;
  BitmapImage1: TBitmapImage;
  Label4: TLabel;
  Label6: TLabel;
  Label7: TLabel;
  NewEdit1: TNewEdit;
  NewMemo1: TNewMemo;
  NewCheckBox1: TNewCheckBox;
  NewRadioButton1: TNewRadioButton;
  NewListBox1: TNewListBox;
  Panel2: TPanel;
  PasswordEdit1: TPasswordEdit;
  NewCheckListBox1: TNewCheckListBox;
  NewStaticText1: TNewStaticText;
  FolderTreeView1: TFolderTreeView;
  RichEditViewer1: TRichEditViewer;
  NewProgressBar1: TNewProgressBar;
  NewComboBox1: TNewComboBox;
  StartMenuFolderTreeView1: TStartMenuFolderTreeView;
  TabSheet2: TTabSheet;
  Label3: TLabel;
  Label8: TLabel;
  Label9: TLabel;
  Label11: TLabel;
  PaintBox1: TPaintBox;
  Label12: TLabel;
  Label13: TLabel;
  NewGroupBox1: TNewGroupBox;
  Label14: TLabel;
  TrackBar1: TTrackBar;
  HotKey1: THotKey;
  UpDown1: TUpDown;
  IPAddressEdit1: TIPAddressEdit;
  HeaderControl1: THeaderControl;
  ScrollBox1: TScrollBox;
  Label10: TLabel;
  ScrollBar1: TScrollBar;
  NewDateTimePicker1: TNewDateTimePicker;
  NewMonthCalendar1: TNewMonthCalendar;
  TabSheet3: TTabSheet;
  NewIconImage1: TNewIconImage;
  Label16: TLabel;
  TabControl1: TTabControl;
  TreeView1: TTreeView;
  ListView1: TListView;
  PpoupMnuPanel: TPanel;
  BlogBtn: TNewButton;
  StatusBar1: TStatusBar;

procedure RedesignWizardForm;
begin
  with WizardForm do
  begin
    Caption := 'ISSkin Viewer Ver1.1';
    ShowHint := True;
  end;

  with WizardForm.Bevel do
  begin
    Visible := False;
  end;

  with WizardForm.CancelButton do
  begin
    Top := ScaleY(309);
  end;

  with WizardForm.OuterNotebook do
  begin
    Visible := False;
  end;

  { Panel1 }
  Panel1 := TPanel.Create(WizardForm);
  with Panel1 do
  begin
    Name := 'Panel1';
    Parent := WizardForm;
    Left := ScaleX(0);
    Top := ScaleY(0);
    Width := ScaleX(497);
    Height := ScaleY(308);
    BevelOuter := bvNone;
    Caption := ' ';
    ParentBackground := False;
  end;

  { Label1 }
  Label1 := TLabel.Create(WizardForm);
  with Label1 do
  begin
    Name := 'Label1';
    Parent := Panel1;
    Caption := 'Skin file:';
    Transparent := False;
    Left := ScaleX(16);
    Top := ScaleY(5);
    Width := ScaleX(40);
    Height := ScaleY(13);
  end;

  { Label2 }
  Label2 := TLabel.Create(WizardForm);
  with Label2 do
  begin
    Name := 'Label2';
    Parent := Panel1;
    Caption := 'INI parameter:';
    Transparent := False;
    Left := ScaleX(288);
    Top := ScaleY(5);
    Width := ScaleX(67);
    Height := ScaleY(13);
  end;

  { ISSkinFileCombo }
  ISSkinFileCombo := TNewComboBox.Create(WizardForm);
  with ISSkinFileCombo do
  begin
    Name := 'ISSkinFileCombo';
    Parent := Panel1;
    Left := ScaleX(16);
    Top := ScaleY(21);
    Width := ScaleX(213);
    Height := ScaleY(21);
    Style := csDropDownList;
    DropDownCount := 16;
  end;

  { ISSkinIniCombo }
  ISSkinIniCombo := TNewComboBox.Create(WizardForm);
  with ISSkinIniCombo do
  begin
    Name := 'ISSkinIniCombo';
    Parent := Panel1;
    Left := ScaleX(288);
    Top := ScaleY(21);
    Width := ScaleX(193);
    Height := ScaleY(21);
    Style := csDropDownList;
  end;

  { BrowserBtn }
  BrowserBtn := TNewButton.Create(WizardForm);
  with BrowserBtn do
  begin
    Name := 'BrowserBtn';
    Parent := Panel1;
    Left := ScaleX(232);
    Top := ScaleY(19);
    Width := ScaleX(51);
    Height := ScaleY(25);
    Caption := 'SkinDir';
  end;

  { PageControl1 }
  PageControl1 := TPageControl.Create(WizardForm);
  with PageControl1 do
  begin
    Name := 'PageControl1';
    Parent := Panel1;
    Left := ScaleX(8);
    Top := ScaleY(47);
    Width := ScaleX(481);
    Height := ScaleY(257);
  end;

  { TabSheet1 }
  TabSheet1 := TTabSheet.Create(WizardForm);
  with TabSheet1 do
  begin
    Name := 'TabSheet1';
    PageControl := PageControl1;
    Caption := 'Standard';
  end;

  { Label5 }
  Label5 := TLabel.Create(WizardForm);
  with Label5 do
  begin
    Name := 'Label5';
    Parent := TabSheet1;
    Caption := 'Bevel';
    Transparent := True;
    Left := ScaleX(24);
    Top := ScaleY(8);
    Width := ScaleX(27);
    Height := ScaleY(13);
  end;

  { Bevel2 }
  Bevel2 := TBevel.Create(WizardForm);
  with Bevel2 do
  begin
    Name := 'Bevel2';
    Parent := TabSheet1;
    Left := ScaleX(7);
    Top := ScaleY(4);
    Width := ScaleX(66);
    Height := ScaleY(21);
    Hint := 'TBevel';
  end;

  { BitmapImage1 }
  BitmapImage1 := TBitmapImage.Create(WizardForm);
  with BitmapImage1 do
  begin
    Name := 'BitmapImage1';
    Parent := TabSheet1;
    Left := ScaleX(405);
    Top := ScaleY(1);
    Width := ScaleX(57);
    Height := ScaleY(45);
    Hint := 'TBitmapImage';
    AutoSize := True;
  end;

  { Label4 }
  Label4 := TLabel.Create(WizardForm);
  with Label4 do
  begin
    Name := 'Label4';
    Parent := TabSheet1;
    Hint := 'TLabel';
    Caption := 'Label';
    Transparent := True;
    Left := ScaleX(80);
    Top := ScaleY(8);
    Width := ScaleX(26);
    Height := ScaleY(13);
  end;

  { Label6 }
  Label6 := TLabel.Create(WizardForm);
  with Label6 do
  begin
    Name := 'Label6';
    Parent := TabSheet1;
    Hint := 'TLabel';
    Caption := 'NewProgressBar:';
    Transparent := True;
    Left := ScaleX(208);
    Top := ScaleY(10);
    Width := ScaleX(82);
    Height := ScaleY(13);
  end;

  { Label7 }
  Label7 := TLabel.Create(WizardForm);
  with Label7 do
  begin
    Name := 'Label7';
    Parent := TabSheet1;
    Hint := 'TLabel';
    Caption := 'PasswordEdit:';
    Transparent := True;
    Left := ScaleX(223);
    Top := ScaleY(34);
    Width := ScaleX(67);
    Height := ScaleY(13);
  end;

  { NewEdit1 }
  NewEdit1 := TNewEdit.Create(WizardForm);
  with NewEdit1 do
  begin
    Name := 'NewEdit1';
    Parent := TabSheet1;
    Left := ScaleX(7);
    Top := ScaleY(56);
    Width := ScaleX(105);
    Height := ScaleY(21);
    Hint := 'TNewEdit';
    Text := 'NewEdit';
  end;

  { NewMemo1 }
  NewMemo1 := TNewMemo.Create(WizardForm);
  with NewMemo1 do
  begin
    Name := 'NewMemo1';
    Parent := TabSheet1;
    Left := ScaleX(7);
    Top := ScaleY(84);
    Width := ScaleX(105);
    Height := ScaleY(89);
    Hint := 'TNewMemo';
    Lines.Text := 'NewMemo1' + #13#10 +
         'Line 2' + #13#10 +
         'Line 3' + #13#10 +
         'Line 4' + #13#10 +
         'Line 5' + #13#10 +
         'Line 6' + #13#10 +
         'Line 7' + #13#10 +
         'Line 8' + #13#10 +
         'Line 9' + #13#10 +
         'Line 10' + #13#10 +
         'Line 11' + #13#10 +
         'Line 12' + #13#10 +
         'Line 13' + #13#10 +
         '';
    ScrollBars := ssBoth;
  end;

  { NewCheckBox1 }
  NewCheckBox1 := TNewCheckBox.Create(WizardForm);
  with NewCheckBox1 do
  begin
    Name := 'NewCheckBox1';
    Parent := TabSheet1;
    Left := ScaleX(7);
    Top := ScaleY(180);
    Width := ScaleX(85);
    Height := ScaleY(17);
    Hint := 'TNewCheckBox';
    Caption := 'NewCheckBox';
  end;

  { NewRadioButton1 }
  NewRadioButton1 := TNewRadioButton.Create(WizardForm);
  with NewRadioButton1 do
  begin
    Name := 'NewRadioButton1';
    Parent := TabSheet1;
    Left := ScaleX(7);
    Top := ScaleY(204);
    Width := ScaleX(105);
    Height := ScaleY(17);
    Hint := 'TNewRadioButton';
    Caption := 'NewRadioButton';
  end;

  { NewListBox1 }
  NewListBox1 := TNewListBox.Create(WizardForm);
  with NewListBox1 do
  begin
    Name := 'NewListBox1';
    Parent := TabSheet1;
    Left := ScaleX(120);
    Top := ScaleY(76);
    Width := ScaleX(85);
    Height := ScaleY(145);
    Hint := 'TNewListBox';
    ItemHeight := 13;
    Items.Text := 'NewListBox' + #13#10 +
         'Line 2' + #13#10 +
         'Line 3' + #13#10 +
         'Line 4' + #13#10 +
         'Line 5' + #13#10 +
         'Line 6' + #13#10 +
         'Line 7' + #13#10 +
         'Line 8' + #13#10 +
         'Line 9' + #13#10 +
         'Line 10' + #13#10 +
         'Line 11' + #13#10 +
         'Line 12' + #13#10 +
         'Line 13';
    ItemIndex := -1;
  end;

  { Panel2 }
  Panel2 := TPanel.Create(WizardForm);
  with Panel2 do
  begin
    Name := 'Panel2';
    Parent := TabSheet1;
    Left := ScaleX(120);
    Top := ScaleY(32);
    Width := ScaleX(85);
    Height := ScaleY(33);
    Hint := 'TPanel';
    Caption := 'Panel';
  end;

  { PasswordEdit1 }
  PasswordEdit1 := TPasswordEdit.Create(WizardForm);
  with PasswordEdit1 do
  begin
    Name := 'PasswordEdit1';
    Parent := TabSheet1;
    Left := ScaleX(296);
    Top := ScaleY(30);
    Width := ScaleX(105);
    Height := ScaleY(21);
    Hint := 'TPasswordEdit';
    Text := 'PasswordEdit1';
  end;

  { NewCheckListBox1 }
  NewCheckListBox1 := TNewCheckListBox.Create(WizardForm);
  with NewCheckListBox1 do
  begin
    Name := 'NewCheckListBox1';
    Parent := TabSheet1;
    Left := ScaleX(208);
    Top := ScaleY(59);
    Width := ScaleX(145);
    Height := ScaleY(81);
    Hint := 'TNewCheckListBox';
  end;

  { NewStaticText1 }
  NewStaticText1 := TNewStaticText.Create(WizardForm);
  with NewStaticText1 do
  begin
    Name := 'NewStaticText1';
    Parent := TabSheet1;
    Hint := 'TNewStaticText';
    Caption := 'NewStaticText';
    Left := ScaleX(120);
    Top := ScaleY(8);
    Width := ScaleX(71);
    Height := ScaleY(14);
  end;

  { FolderTreeView1 }
  FolderTreeView1 := TFolderTreeView.Create(WizardForm);
  with FolderTreeView1 do
  begin
    Name := 'FolderTreeView1';
    Parent := TabSheet1;
    Left := ScaleX(208);
    Top := ScaleY(144);
    Width := ScaleX(145);
    Height := ScaleY(81);
    Cursor := crArrow;
    Hint := 'TFolderTreeView';
  end;

  { RichEditViewer1 }
  RichEditViewer1 := TRichEditViewer.Create(WizardForm);
  with RichEditViewer1 do
  begin
    Name := 'RichEditViewer1';
    Parent := TabSheet1;
    Left := ScaleX(360);
    Top := ScaleY(59);
    Width := ScaleX(105);
    Height := ScaleY(81);
    Hint := 'TRichEditViewer';
  end;

  { NewProgressBar1 }
  NewProgressBar1 := TNewProgressBar.Create(WizardForm);
  with NewProgressBar1 do
  begin
    Name := 'NewProgressBar1';
    Parent := TabSheet1;
    Left := ScaleX(296);
    Top := ScaleY(8);
    Width := ScaleX(105);
    Height := ScaleY(17);
    Hint := 'TNewProgressBar';
    Min := 0;
    Max := 100;
    Position := 70;
  end;

  { NewComboBox1 }
  NewComboBox1 := TNewComboBox.Create(WizardForm);
  with NewComboBox1 do
  begin
    Name := 'NewComboBox1';
    Parent := TabSheet1;
    Left := ScaleX(7);
    Top := ScaleY(32);
    Width := ScaleX(105);
    Height := ScaleY(21);
    Hint := 'TNewComboBox';
    Text := 'NewCombobox';
    Items.Text := 'NewCombobox' + #13#10 +
         'Line 2' + #13#10 +
         'Line 3' + #13#10 +
         'Line 4' + #13#10 +
         'Line 5' + #13#10 +
         'Line 6' + #13#10 +
         'Line 7' + #13#10 +
         'Line 8' + #13#10 +
         'Line 9' + #13#10 +
         'Line 10' + #13#10 +
         'Line 11' + #13#10 +
         'Line 12' + #13#10 +
         'Line 13';
    ItemIndex := 0;
  end;

  { StartMenuFolderTreeView1 }
  StartMenuFolderTreeView1 := TStartMenuFolderTreeView.Create(WizardForm);
  with StartMenuFolderTreeView1 do
  begin
    Name := 'StartMenuFolderTreeView1';
    Parent := TabSheet1;
    Left := ScaleX(360);
    Top := ScaleY(144);
    Width := ScaleX(105);
    Height := ScaleY(81);
    Cursor := crArrow;
    Hint := 'TStartMenuFolderTreeView';
  end;

  NewEdit1.TabOrder := 0;
  NewMemo1.TabOrder := 1;
  NewCheckBox1.TabOrder := 2;
  NewRadioButton1.TabOrder := 3;
  NewListBox1.TabOrder := 4;
  Panel2.TabOrder := 5;
  PasswordEdit1.TabOrder := 6;
  NewCheckListBox1.TabOrder := 7;
  NewStaticText1.TabOrder := 8;
  FolderTreeView1.TabOrder := 9;
  RichEditViewer1.TabOrder := 10;
  NewProgressBar1.TabOrder := 11;
  NewComboBox1.TabOrder := 12;
  StartMenuFolderTreeView1.TabOrder := 13;

  { TabSheet2 }
  TabSheet2 := TTabSheet.Create(WizardForm);
  with TabSheet2 do
  begin
    Name := 'TabSheet2';
    PageControl := PageControl1;
    Caption := 'Extended 1';
  end;

  { Label3 }
  Label3 := TLabel.Create(WizardForm);
  with Label3 do
  begin
    Name := 'Label3';
    Parent := TabSheet2;
    Hint := 'TLabel';
    Caption := 'HotKey:';
    Transparent := True;
    Left := ScaleX(4);
    Top := ScaleY(27);
    Width := ScaleX(38);
    Height := ScaleY(13);
  end;

  { Label8 }
  Label8 := TLabel.Create(WizardForm);
  with Label8 do
  begin
    Name := 'Label8';
    Parent := TabSheet2;
    Hint := 'TLabel';
    Caption := 'UpDown:';
    Transparent := True;
    Left := ScaleX(205);
    Top := ScaleY(209);
    Width := ScaleX(45);
    Height := ScaleY(13);
  end;

  { Label9 }
  Label9 := TLabel.Create(WizardForm);
  with Label9 do
  begin
    Name := 'Label9';
    Parent := TabSheet2;
    Hint := 'TLabel';
    Caption := 'IPAddressEdit:';
    Transparent := True;
    Left := ScaleX(108);
    Top := ScaleY(27);
    Width := ScaleX(69);
    Height := ScaleY(13);
  end;

  { Label11 }
  Label11 := TLabel.Create(WizardForm);
  with Label11 do
  begin
    Name := 'Label11';
    Parent := TabSheet2;
    Hint := 'TLabel';
    Caption := 'PaintBox';
    Transparent := True;
    Left := ScaleX(408);
    Top := ScaleY(53);
    Width := ScaleX(42);
    Height := ScaleY(13);
  end;

  { PaintBox1 }
  PaintBox1 := TPaintBox.Create(WizardForm);
  with PaintBox1 do
  begin
    Name := 'PaintBox1';
    Parent := TabSheet2;
    Left := ScaleX(396);
    Top := ScaleY(24);
    Width := ScaleX(65);
    Height := ScaleY(71);
    Hint := 'TPaintBox';
  end;

  { Label12 }
  Label12 := TLabel.Create(WizardForm);
  with Label12 do
  begin
    Name := 'Label12';
    Parent := TabSheet2;
    Hint := 'TLabel';
    Caption := 'ScrollBar:';
    Transparent := True;
    Left := ScaleX(6);
    Top := ScaleY(209);
    Width := ScaleX(45);
    Height := ScaleY(13);
  end;

  { Label13 }
  Label13 := TLabel.Create(WizardForm);
  with Label13 do
  begin
    Name := 'Label13';
    Parent := TabSheet2;
    Hint := 'TLabel';
    Caption := 'NewDateTimePicker:';
    Transparent := True;
    Left := ScaleX(276);
    Top := ScaleY(208);
    Width := ScaleX(101);
    Height := ScaleY(13);
  end;

  { NewGroupBox1 }
  NewGroupBox1 := TNewGroupBox.Create(WizardForm);
  with NewGroupBox1 do
  begin
    Name := 'NewGroupBox1';
    Parent := TabSheet2;
    Left := ScaleX(281);
    Top := ScaleY(103);
    Width := ScaleX(185);
    Height := ScaleY(96);
    Hint := 'TNewGroupBox';
    Caption := 'NewGroupBox';
  end;

  { Label14 }
  Label14 := TLabel.Create(WizardForm);
  with Label14 do
  begin
    Name := 'Label14';
    Parent := NewGroupBox1;
    Hint := 'TLabel';
    Caption := 'TrackBar:';
    Transparent := True;
    Left := ScaleX(28);
    Top := ScaleY(27);
    Width := ScaleX(47);
    Height := ScaleY(13);
  end;

  { TrackBar1 }
  TrackBar1 := TTrackBar.Create(WizardForm);
  with TrackBar1 do
  begin
    Name := 'TrackBar1';
    Parent := NewGroupBox1;
    Left := ScaleX(19);
    Top := ScaleY(47);
    Width := ScaleX(150);
    Height := ScaleY(37);
    Hint := 'TTrackBar';
  end;

  TrackBar1.TabOrder := 0;

  { HotKey1 }
  HotKey1 := THotKey.Create(WizardForm);
  with HotKey1 do
  begin
    Name := 'HotKey1';
    Parent := TabSheet2;
    Left := ScaleX(44);
    Top := ScaleY(24);
    Width := ScaleX(57);
    Height := ScaleY(19);
    Hint := 'THotKey';
    ParentColor := False;
    HotKey := 32833;
  end;

  { UpDown1 }
  UpDown1 := TUpDown.Create(WizardForm);
  with UpDown1 do
  begin
    Name := 'UpDown1';
    Parent := TabSheet2;
    Left := ScaleX(251);
    Top := ScaleY(205);
    Width := ScaleX(17);
    Height := ScaleY(22);
  end;

  { IPAddressEdit1 }
  IPAddressEdit1 := TIPAddressEdit.Create(WizardForm);
  with IPAddressEdit1 do
  begin
    Name := 'IPAddressEdit1';
    Parent := TabSheet2;
    Left := ScaleX(180);
    Top := ScaleY(24);
    Width := ScaleX(102);
    Height := ScaleY(21);
    Hint := 'TIPAddressEdit';
    Field1Value := 192;
    Field2Value := 168;
    Field4Value := 152;
    IPValue := -1062731624;
    InitClear := False;
  end;

  { HeaderControl1 }
  HeaderControl1 := THeaderControl.Create(WizardForm);
  with HeaderControl1 do
  begin
    Name := 'HeaderControl1';
    Parent := TabSheet2;
    Hint := 'THeaderControl';
    with Sections.Add do
    begin
      Text := 'HeaderSection1';
      Width := ScaleX(100);
    end;
    with Sections.Add do
    begin
      Text := 'HeaderSection2';
      Width := ScaleX(100);
    end;
    with Sections.Add do
    begin
      Text := 'HeaderSection3';
      Width := ScaleX(100);
    end;
    Left := ScaleX(0);
    Top := ScaleY(0);
    Width := ScaleX(473);
    Height := ScaleY(17);
  end;

  { ScrollBox1 }
  ScrollBox1 := TScrollBox.Create(WizardForm);
  with ScrollBox1 do
  begin
    Name := 'ScrollBox1';
    Parent := TabSheet2;
    Left := ScaleX(292);
    Top := ScaleY(24);
    Width := ScaleX(97);
    Height := ScaleY(71);
    Hint := 'TScrollBox';
  end;

  { Label10 }
  Label10 := TLabel.Create(WizardForm);
  with Label10 do
  begin
    Name := 'Label10';
    Parent := ScrollBox1;
    Hint := 'TScrollBox';
    Caption := 'ScrollBox';
    Transparent := True;
    Left := ScaleX(28);
    Top := ScaleY(27);
    Width := ScaleX(44);
    Height := ScaleY(13);
  end;

  { ScrollBar1 }
  ScrollBar1 := TScrollBar.Create(WizardForm);
  with ScrollBar1 do
  begin
    Name := 'ScrollBar1';
    Parent := TabSheet2;
    Left := ScaleX(59);
    Top := ScaleY(207);
    Width := ScaleX(137);
    Height := ScaleY(17);
    Hint := 'TScrollBar';
  end;

  { NewDateTimePicker1 }
  NewDateTimePicker1 := TNewDateTimePicker.Create(WizardForm);
  with NewDateTimePicker1 do
  begin
    Name := 'NewDateTimePicker1';
    Parent := TabSheet2;
    Left := ScaleX(380);
    Top := ScaleY(204);
    Width := ScaleX(90);
    Height := ScaleY(21);
    Hint := 'TNewDateTimePicker';
    Date := 40355.8259034954;
    Time := 40355.8259034954;
  end;

  { NewMonthCalendar1 }
  NewMonthCalendar1 := TNewMonthCalendar.Create(WizardForm);
  with NewMonthCalendar1 do
  begin
    Name := 'NewMonthCalendar1';
    Parent := TabSheet2;
    Left := ScaleX(4);
    Top := ScaleY(49);
    Width := ScaleX(267);
    Height := ScaleY(153);
    Hint := 'TNewMonthCalendar';
    AutoSize := True;
    Date := 40355;
  end;

  NewGroupBox1.TabOrder := 0;
  HotKey1.TabOrder := 1;
  UpDown1.TabOrder := 2;
  IPAddressEdit1.TabOrder := 3;
  HeaderControl1.TabOrder := 4;
  ScrollBox1.TabOrder := 5;
  ScrollBar1.TabOrder := 6;
  NewDateTimePicker1.TabOrder := 7;
  NewMonthCalendar1.TabOrder := 8;

  { TabSheet3 }
  TabSheet3 := TTabSheet.Create(WizardForm);
  with TabSheet3 do
  begin
    Name := 'TabSheet3';
    PageControl := PageControl1;
    Caption := 'Extended 2';
  end;

  { NewIconImage1 }
  NewIconImage1 := TNewIconImage.Create(WizardForm);
  with NewIconImage1 do
  begin
    Name := 'NewIconImage1';
    Parent := TabSheet3;
    Left := ScaleX(376);
    Top := ScaleY(54);
    Width := ScaleX(72);
    Height := ScaleY(72);
    Hint := 'TNewIconImage';
    AutoSize := True;
    BackColor := clNone;
  end;

  { Label16 }
  Label16 := TLabel.Create(WizardForm);
  with Label16 do
  begin
    Name := 'Label16';
    Parent := TabSheet3;
    Hint := 'TLabel';
    Caption := 'NewIconImage:';
    Transparent := True;
    Left := ScaleX(376);
    Top := ScaleY(37);
    Width := ScaleX(75);
    Height := ScaleY(13);
  end;

  { TabControl1 }
  TabControl1 := TTabControl.Create(WizardForm);
  with TabControl1 do
  begin
    Name := 'TabControl1';
    Parent := TabSheet3;
    Left := ScaleX(20);
    Top := ScaleY(6);
    Width := ScaleX(433);
    Height := ScaleY(23);
    Tabs.Text := 'Tab 1' + #13#10 +
         'Tab 2' + #13#10 +
         'Tab 3' + #13#10 +
         'Tab 4' + #13#10 +
         'Tab 5' + #13#10 +
         'Tab 6';
    TabIndex := 0;
  end;

  { TreeView1 }
  TreeView1 := TTreeView.Create(WizardForm);
  with TreeView1 do
  begin
    Name := 'TreeView1';
    Parent := TabSheet3;
    Left := ScaleX(4);
    Top := ScaleY(38);
    Width := ScaleX(177);
    Height := ScaleY(177);
    Indent := 19;
    Items.Add(nil, 'TreeViewItem1');
    with Items.Add(nil, 'TreeViewItem2') do
    begin
      Items.AddChild(Items[1], 'TreeViewSItem1');
      Items.AddChild(Items[1], 'TreeViewSItem2');
    end;
    Items.Add(nil, 'TreeViewItem3');
    with Items.Add(nil, 'TreeViewItem4') do
    begin
      with Items.AddChild(Items[5], 'TreeViewSItem1') do
      begin
        Items.AddChild(Items[6], 'TreeViewSItem2');
      end;
    end;
    Items.Add(nil, 'TreeViewItem5');
    Items.Add(nil, 'TreeViewItem6');
    Items.Add(nil, 'TreeViewItem7');
    with Items.Add(nil, 'TreeViewItem8') do
    begin
      with Items.AddChild(Items[11], 'TreeViewSItem1') do
      begin
        Items.AddChild(Items[12], 'TreeViewSSItem1');
      end;
      Items.AddChild(Items[11], 'TreeViewSItem2');
    end;
  end;

  { ListView1 }
  ListView1 := TListView.Create(WizardForm);
  with ListView1 do
  begin
    Name := 'ListView1';
    Parent := TabSheet3;
    Left := ScaleX(188);
    Top := ScaleY(38);
    Width := ScaleX(177);
    Height := ScaleY(177);
    with Columns.Add do
    begin
      Caption := 'Column1';
      Width := ScaleX(80);
    end;
    with Columns.Add do
    begin
      Caption := 'Column2';
      Width := ScaleX(60);
    end;
    with Columns.Add do
    begin
      Caption := 'Column3';
      Width := ScaleX(60);
    end;
    with Items.Add do
    begin
      Caption := 'ListViewItem1';
      SubItems.Add('SubItem1');
      SubItems.Add('SubItem2');
    end;
    with Items.Add do
    begin
      Caption := 'ListViewItem2';
      SubItems.Add('SubItem1');
      SubItems.Add('SubItem2');
    end;
    with Items.Add do
    begin
      Caption := 'ListViewItem3';
      SubItems.Add('SubItem1');
      SubItems.Add('SubItem2');
    end;
    with Items.Add do
    begin
      Caption := 'ListViewItem4';
      SubItems.Add('SubItem1');
    end;
    with Items.Add do
    begin
      Caption := 'ListViewItem5';
    end;
    with Items.Add do
    begin
      Caption := 'ListViewItem6';
    end;
    with Items.Add do
    begin
      Caption := 'ListViewItem7';
    end;
    with Items.Add do
    begin
      Caption := 'ListViewItem8';
    end;
    with Items.Add do
    begin
      Caption := 'ListViewItem9';
    end;
    with Items.Add do
    begin
      Caption := 'ListViewItem10';
    end;
    with Items.Add do
    begin
      Caption := 'ListViewItem11';
    end;
    with Items.Add do
    begin
      Caption := 'ListViewItem12';
    end;
    ViewStyle := vsReport;
  end;

  { PpoupMnuPanel }
  PpoupMnuPanel := TPanel.Create(WizardForm);
  with PpoupMnuPanel do
  begin
    Name := 'PpoupMnuPanel';
    Parent := TabSheet3;
    Left := ScaleX(376);
    Top := ScaleY(142);
    Width := ScaleX(81);
    Height := ScaleY(57);
    Caption := 'PopupMenu';
  end;

  TabControl1.TabOrder := 0;
  TreeView1.TabOrder := 1;
  ListView1.TabOrder := 2;
  PpoupMnuPanel.TabOrder := 3;

  ISSkinFileCombo.TabOrder := 0;
  ISSkinIniCombo.TabOrder := 1;
  BrowserBtn.TabOrder := 2;
  PageControl1.TabOrder := 3;

  { BlogBtn }
  BlogBtn := TNewButton.Create(WizardForm);
  with BlogBtn do
  begin
    Name := 'BlogBtn';
    Parent := WizardForm;
    Left := ScaleX(20);
    Top := ScaleY(309);
    Width := ScaleX(107);
    Height := ScaleY(23);
    Hint := 'visit my blog';
    Caption := 'RESTOOLS'' BLOG';
  end;

  { StatusBar1 }
  StatusBar1 := TStatusBar.Create(WizardForm);
  with StatusBar1 do
  begin
    Name := 'StatusBar1';
    Parent := WizardForm;
    with Panels.Add do
    begin
      Text := 'StatusPanel1';
      Width := ScaleX(100);
    end;
    with Panels.Add do
    begin
      Text := 'StatusPanel2';
      Width := ScaleX(100);
    end;
    with Panels.Add do
    begin
      Text := 'StatusPanel3';
      Width := ScaleX(100);
    end;
    ThemeBackground := False;
    Left := ScaleX(0);
    Top := ScaleY(341);
    Width := ScaleX(497);
    Height := ScaleY(19);
  end;

  Panel1.TabOrder := 0;
  WizardForm.OuterNotebook.TabOrder := 1;
  WizardForm.BeveledLabel.TabOrder := 2;
  WizardForm.BackButton.TabOrder := 3;
  WizardForm.NextButton.TabOrder := 4;
  WizardForm.CancelButton.TabOrder := 5;
  BlogBtn.TabOrder := 6;
  StatusBar1.TabOrder := 7;

  { Set Other Properties }
  PageControl1.ActivePage := TabSheet1;

{ ReservationBegin }
  RichEditViewer1.ThemeBorder := False;

  NewCheckListBox1.AddCheckBox('TNewCheckListBox', '', 0, True, True, False, True, nil);
  NewCheckListBox1.AddRadioButton('TNewCheckListBox', '', 1, True, True, nil);
  NewCheckListBox1.AddRadioButton('TNewCheckListBox', '', 1, False, True, nil);
  NewCheckListBox1.AddCheckBox('TNewCheckListBox', '', 0, True, True, False, True, nil);
  NewCheckListBox1.AddCheckBox('TNewCheckListBox', '', 0, True, True, False, True, nil);
  NewCheckListBox1.AddCheckBox('TNewCheckListBox', '', 0, True, True, False, True, nil);

  PupMnu := TPopupMenu.Create(WizardForm);
  // Menu 1
  Mnu := TMenuItem.Create(WizardForm);
  Mnu.Caption := 'MenuItem 1';
  PupMnu.Items.Add(Mnu);
  // ---------
  Mnu := TMenuItem.Create(WizardForm);
  Mnu.Caption := '-';
  PupMnu.Items.Add(Mnu);
  // Menu 2
  Mnu := TMenuItem.Create(WizardForm);
  Mnu.Caption := 'MenuItem 2';
  PupMnu.Items.Add(Mnu);
  // Menu 3
  Mnu := TMenuItem.Create(WizardForm);
  Mnu.Caption := 'MenuItem 3';
  PupMnu.Items.Add(Mnu);

  PpoupMnuPanel.PopupMenu := PupMnu;

  BitmapImage1.Bitmap.LoadFromFile(SkinFilePath+'\SakuraSmall.bmp');
  NewIconImage1.Icon.Width := 72;
  NewIconImage1.Icon.Height := 72;
  NewIconImage1.Icon.LoadFromFile(SkinFilePath+'\ISSkin.ico');

  BrowserBtn.OnClick := @BrowserBtn_OnClick;
  ISSkinFileCombo.OnChange := @ISSkinFileCombo_OnChange;
  ISSkinIniCombo.OnChange := @ISSkinIniCombo_OnChange;
  BlogBtn.OnClick := @BlogBtn_OnClick;
{ ReservationEnd }
end;
// Don't modify this section. It is generated automatically.
{ RedesignWizardFormEnd } // Don't remove this line!

procedure BlogBtn_OnClick(Sender: TObject);
var
  Res: Integer;
begin
  ShellExec('open', 'http://restools.hanzify.org','','', SW_SHOW, ewNoWait, Res);
end;

function EnumResName(hModule: THandle; lpType, lpName: String; lParam: Longint): Boolean;
begin
  ISSkinIniCombo.Items.Append(lpName);
  Result := True;
end;

procedure ISSkinIniCombo_OnChange(Sender: TObject);
var
  SkinFile, SkinIni: String;
begin
  try
    SkinFile := '';
    SkinIni := '';
    if ISSkinFileCombo.Items[ISSkinFileCombo.ItemIndex] <> '' then
      SkinFile := SkinFilePath+'\'+ISSkinFileCombo.Items[ISSkinFileCombo.ItemIndex];
    if ISSkinIniCombo.Items[ISSkinIniCombo.ItemIndex] <> '' then
      SkinIni := ISSkinIniCombo.Items[ISSkinIniCombo.ItemIndex];

    LoadSkin(SkinFile, SkinIni);
  except
  end;
end;

procedure ISSkinFileCombo_OnChange(Sender: TObject);
var
  hSkin: THandle;
  i, DelIndex: Integer;
  S, SkinFile, SkinIni: String;
begin
  try
    hSkin:=LoadLibrary(SkinFilePath+'\'+ISSkinFileCombo.Items[ISSkinFileCombo.ItemIndex]);
    try
      ISSkinIniCombo.Items.Clear;

      EnumResourceNames(hSkin, 'TEXTFILE', CallbackAddr('EnumResName'), 0);

      DelIndex := -1;
      for i := 0 to ISSkinIniCombo.Items.Count - 1 do
      begin
        S := ISSkinIniCombo.Items[i];
        if CompareText(S, 'THEMES_INI')=0 then
          DelIndex := i;
        StringChange(S, '_', '.');
        ISSkinIniCombo.Items[i] := S;
      end;

      if DelIndex >= 0 then
        ISSkinIniCombo.Items.Delete(DelIndex);

      if ISSkinIniCombo.Items.Count >= 0 then
        ISSkinIniCombo.ItemIndex := ISSkinIniCombo.Items.Count - 1;
    finally
      FreeLibrary(hSkin);
    end;

    SkinFile := '';
    SkinIni := '';
    if ISSkinFileCombo.Items[ISSkinFileCombo.ItemIndex] <> '' then
      SkinFile := SkinFilePath+'\'+ISSkinFileCombo.Items[ISSkinFileCombo.ItemIndex];
    if ISSkinIniCombo.Items[ISSkinIniCombo.ItemIndex] <> '' then
      SkinIni := ISSkinIniCombo.Items[ISSkinIniCombo.ItemIndex];

    LoadSkin(SkinFile, SkinIni);
  except
  end;
end;

procedure FindSkinFile();
var
  FindRec: TFindRec;
begin
  ISSkinFileCombo.Items.Clear;
  ISSkinIniCombo.Items.Clear;
  if FindFirst(SkinFilePath+'\*.cjstyles', FindRec) then begin
    ISSkinFileCombo.Items.BeginUpdate;
    try
      repeat
        if FindRec.Attributes and FILE_ATTRIBUTE_DIRECTORY = 0 then
          ISSkinFileCombo.Items.Append(FindRec.Name);
      until not FindNext(FindRec);
    finally
      ISSkinFileCombo.Items.EndUpdate;
      FindClose(FindRec);
    end;
  end;
end;

procedure BrowserBtn_OnClick(Sender: TObject);
begin
  if BrowseForFolder('Skin files:', SkinFilePath, False) then
  begin
    FindSkinFile();
    UnloadSkin;
  end;
end;

function InitializeSetup(): Boolean;
begin
  ViewerPath := ExtractFileDir(ExpandConstant('{srcexe}'));
  SkinFilePath := ViewerPath+'\Styles';
	LoadSkin('', '');    
	Result := True;
end;

procedure InitializeWizard();
begin
  RedesignWizardForm;
  FindSkinFile();
  ISSkinFileCombo.Sorted := True;
end;

Procedure SetAppTitle(Value: String);
var
  n: HWND;
begin
  n:=GetWindowLong(MainForm.Handle, -8);
  if n <> 0 then SetWindowText(n, Value);
end;

procedure CurPageChanged(CurPageID: Integer);
begin
  WizardForm.NextButton.Hide;
  WizardForm.CancelButton.Caption := 'Close';
  SetAppTitle('ISSkin Viewer');
end;

